home *** CD-ROM | disk | FTP | other *** search
/ Cope with Cancer / Cope with Cancer.iso / pc / cope / copehelp.dxr / 00183.ls < prev    next >
Encoding:
Text File  |  1998-11-03  |  216 b   |  11 lines
  1. on exitFrame
  2.   global gHoldit
  3.   set the volume of sprite 10 to 200
  4.   set the soundLevel to 6
  5.   updateStage()
  6.   repeat while the ticks < (gHoldit + 30)
  7.     go(the frame)
  8.     UpdateSlider(9, 141, 252)
  9.   end repeat
  10. end
  11.